Know Your Hockey - The Greatest Player Resource/Know Your Hockey: The Greatest Player Resource.iso/hockey/director/ktgcst.cst/00068_Script_For Roles Def

Text File | 1998-09-28 | 2KB | 68 lines

global lastrollover,thisrollover
on Spriteoffplayer
  set mysprite = lastrollover
  if getat(gbuttonstate,mysprite) = 0 then
    set the blend of sprite(lastrollover) = 0
    set the blend of sprite(lastrollover+20) = 0
    updateStage
  end if
end


on SpriteOnplayer
  set the blend of sprite(thisrollover) = 100
  set the blend of sprite(thisrollover+20) = 100
end
---- low sprites
on Spriteofftwinlow
  set mysprite = lastrollover+10
  if getat(gbuttonstate,mysprite) = 0 then
    set the blend of sprite(lastrollover-10) = 0
    set the blend of sprite(lastrollover+10) = 0
    updateStage
  end if
end


on SpriteonTwinLow
  put 12
  -- if thisrollover-10 < 1 then exit
  set the blend of sprite(thisrollover-10) = 100
  set the blend of sprite(thisrollover+10) = 100
end

---- hi sprites

on Spriteofftwinhi1
  set mysprite = lastrollover+4
  if getat(gbuttonstate,mysprite) = 0 then
    set the blend of sprite(lastrollover-16) = 0
    set the blend of sprite(lastrollover+4) = 0
    updateStage
  end if
end


on SpriteonTwinhi1
  if thisrollover-16 < 1 then exit
  set the blend of sprite(thisrollover-16) = 100
  set the blend of sprite(thisrollover+4) = 100
end

on Spriteofftwinhi2
  set mysprite = lastrollover+6
  if getat(gbuttonstate,mysprite) = 0 then
    set the blend of sprite(lastrollover-14) = 0
    set the blend of sprite(lastrollover+6) = 0
    updateStage
  end if
end


on SpriteonTwinhi2
  if thisrollover-14 < 1 then exit
  set the blend of sprite(thisrollover-14) = 100
  set the blend of sprite(thisrollover+6) = 100
end